        jmp     start

array   db      0, 9, 10, 11, 98, 99, 100, 255
size    equ     $ - array

p1      equ     10                                    ; (1)
p2      equ     99                                    ; (2)
map     db      p1 dup 0                              ; (3)
        db      (p2 - p1 + 1) dup 1                   ; (4)
        db      256 - ($ - map) dup 0                 ; (5)
start:                                                ; (6)
        lea     si, array                             ; (7)
        mov     cx, size                              ; (8)
        lea     bx, map                               ; (9)
        cld                                           ; (10)
        mov     ax, dx, 0                             ; (11)
l1:                                                   ; (12)
        lodsb                                         ; (13)
        xlat                                          ; (14)
        add     dx, ax                                ; (15)
        loop    l1                                    ; (16)
        mov     ax, dx                                ; (17)
;       ...
        int     020
